home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / demos / az / cyberx.dxr / 00110_PANIC.ls < prev    next >
Encoding:
Text File  |  1996-10-06  |  278 b   |  14 lines
  1. on mouseDown
  2.   puppetSprite(27, 1)
  3.   repeat while the mouseDown
  4.     if rollOver(27) then
  5.       set the castNum of sprite 27 to 2106
  6.       updateStage()
  7.       next repeat
  8.     end if
  9.     set the castNum of sprite 27 to 110
  10.     updateStage()
  11.   end repeat
  12.   puppetSprite(27, 0)
  13. end
  14.